(scan_lisp_file): Fix typo causing infloop.

diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c
index 849ff25397ee3d31110aaf0eac2431f201792db4..3045dc305f275b758feb7138c26d02455b1f2c3b 100644 (file)
--- a/lib-src/make-docfile.c
+++ b/lib-src/make-docfile.c
@@ -629,7 +629,7 @@ scan_lisp_file (filename, mode)
          continue;
        }
       /* Skip the line break.  */
-      while (c == '\n' || c != '\r')
+      while (c == '\n' || c == '\r')
        c = getc (infile);
       /* Detect a dynamic doc string and save it for the next expression.  */
       if (c == '#')